Mobiclic 55/MOBICLIC 55.ISO/DATA/MOBICLUB/MEDIATTI.CST/00012_Script_Wait Son

Text File | 2003-06-26 | 1KB | 39 lines

property pPisteSon,pWaitSon,pClicOK
--xxxxxxxxxxx
on getBehaviorDescription me
  return \
    "Fait rester la tΩte de lecture sur place par dΘfaut ou dans l'attente de la fin de la lecture d'un son."
end getBehaviorDescription
--xxxxxxxxxxx
on getBehaviorTooltip me
  return \
    "Indiquer si on attend la fin d'un son, et si oui, dans quelle piste celui-ci est lu."
end getBehaviorTooltip
--xxxxxxxxxxx
on getPropertyDescriptionList
  vPDList = [:]
  setaProp vPDList, #pWaitSon, [#comment: "Attendre la lecture d'un son sur une piste ? :", \
    #format: #boolean, #default: 1]
  setaProp vPDList, #pPisteSon, [#comment: "Quelle piste ?", \
    #format: #integer, #default: 3,#range:[#min:1,#max:8]]
  setaProp vPDList, #pClicOK, [#comment: "Clic Θcran coupe son ? :", \
    #format: #boolean, #default: 0]
  return vPDList
end getPropertyDescriptionList
--xxxxxxxxxxx
on exitFrame me
  if pWaitSon = 1 then
    if soundBusy(pPisteSon) = 1 then
      go to the frame
    end if
  else
    go to the frame
  end if
end
--xxxxxxxxxxx
on mouseDown me
  if pClicOk then
    coupeson pPisteSon
  end if
end